Nuprl Lemma : rel_star_closure
4,23
postcript
pdf
T
:Type,
R
,
R2
:(
T
T
Prop).
(Trans
_1
,
_2
:
T
.
R2
(
_1
,
_2
))
(
x
,
y
:
T
. (
x
R
y
)
(
x
R2
y
))
(
x
,
y
:
T
. (
x
(
R
^*)
y
)
(
x
R2
y
)
x
=
y
)
latex
Definitions
i
j
,
P
Q
,
Trans
x
,
y
:
T
.
E
(
x
;
y
)
,
x
,
y
.
t
(
x
;
y
)
,
x
(
s1
,
s2
)
,
Prop
,
R
^*
,
x
:
A
.
B
(
x
)
,
x
f
y
,
R
^
n
,
,
A
,
False
,
P
Q
,
A
B
,
x
:
A
.
B
(
x
)
,
t
T
,
True
,
{
T
}
,
Unit
,
P
Q
,
i
=
j
,
,
b
,
b
,
P
&
Q
Lemmas
assert
wf
,
not
wf
,
bnot
wf
,
bool
wf
,
eq
int
wf
,
assert
of
eq
int
,
not
functionality
wrt
iff
,
assert
of
bnot
,
iff
transitivity
,
eqff
to
assert
,
eqtt
to
assert
,
le
wf
,
rel
exp
wf
,
trans
wf
,
rel
star
wf
,
nat
properties
,
ge
wf
origin